home *** CD-ROM | disk | FTP | other *** search
-
- Listing 8
- *************
- ; string = -4
- ; wordarray = -10
- ; count = -6
- mov bx,WORD PTR [bp-6] ;count
- les si,DWORD PTR [bp-4] ;string
- mov al,es:[bx][si] ; get string
- cbw ; convert byte to word (sign
- extended)
- mov bx,ax ; index into wordarray
- shl bx,1 ; multiply by 2 (size of int)
- les si,DWORD PTR [bp-10] ; wordarray base address in si
- mov ax,es:[bx][si] ; [bx][si] added together
- ; yields base + index for wordarray
- inc WORD PTR es:[bx][si]
- *******
-